3.2.2 \(\int \frac {1}{(a+b x^2)^2 \sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx\) [102]

Optimal. Leaf size=485 \[ -\frac {b f x \sqrt {c+d x^2}}{2 a (b c-a d) (b e-a f) \sqrt {e+f x^2}}+\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a (b c-a d) (b e-a f) \left (a+b x^2\right )}+\frac {b \sqrt {e} \sqrt {f} \sqrt {c+d x^2} E\left (\tan ^{-1}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 a (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}} \sqrt {e+f x^2}}-\frac {d \sqrt {e} \sqrt {f} \sqrt {c+d x^2} F\left (\tan ^{-1}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 c (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}} \sqrt {e+f x^2}}+\frac {\sqrt {-c} \left (b^2 c e+3 a^2 d f-2 a b (d e+c f)\right ) \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};\sin ^{-1}\left (\frac {\sqrt {d} x}{\sqrt {-c}}\right )|\frac {c f}{d e}\right )}{2 a^2 \sqrt {d} (b c-a d) (b e-a f) \sqrt {c+d x^2} \sqrt {e+f x^2}} \]

[Out]

-1/2*b*f*x*(d*x^2+c)^(1/2)/a/(-a*d+b*c)/(-a*f+b*e)/(f*x^2+e)^(1/2)+1/2*b*(1/(1+f*x^2/e))^(1/2)*(1+f*x^2/e)^(1/
2)*EllipticE(x*f^(1/2)/e^(1/2)/(1+f*x^2/e)^(1/2),(1-d*e/c/f)^(1/2))*e^(1/2)*f^(1/2)*(d*x^2+c)^(1/2)/a/(-a*d+b*
c)/(-a*f+b*e)/(e*(d*x^2+c)/c/(f*x^2+e))^(1/2)/(f*x^2+e)^(1/2)-1/2*d*(1/(1+f*x^2/e))^(1/2)*(1+f*x^2/e)^(1/2)*El
lipticF(x*f^(1/2)/e^(1/2)/(1+f*x^2/e)^(1/2),(1-d*e/c/f)^(1/2))*e^(1/2)*f^(1/2)*(d*x^2+c)^(1/2)/c/(-a*d+b*c)/(-
a*f+b*e)/(e*(d*x^2+c)/c/(f*x^2+e))^(1/2)/(f*x^2+e)^(1/2)+1/2*b^2*x*(d*x^2+c)^(1/2)*(f*x^2+e)^(1/2)/a/(-a*d+b*c
)/(-a*f+b*e)/(b*x^2+a)+1/2*(b^2*c*e+3*a^2*d*f-2*a*b*(c*f+d*e))*EllipticPi(x*d^(1/2)/(-c)^(1/2),b*c/a/d,(c*f/d/
e)^(1/2))*(-c)^(1/2)*(1+d*x^2/c)^(1/2)*(1+f*x^2/e)^(1/2)/a^2/(-a*d+b*c)/(-a*f+b*e)/d^(1/2)/(d*x^2+c)^(1/2)/(f*
x^2+e)^(1/2)

________________________________________________________________________________________

Rubi [A]
time = 0.23, antiderivative size = 485, normalized size of antiderivative = 1.00, number of steps used = 8, number of rules used = 7, integrand size = 32, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.219, Rules used = {563, 552, 551, 545, 429, 506, 422} \begin {gather*} \frac {\sqrt {-c} \sqrt {\frac {d x^2}{c}+1} \sqrt {\frac {f x^2}{e}+1} \left (3 a^2 d f-2 a b (c f+d e)+b^2 c e\right ) \Pi \left (\frac {b c}{a d};\text {ArcSin}\left (\frac {\sqrt {d} x}{\sqrt {-c}}\right )|\frac {c f}{d e}\right )}{2 a^2 \sqrt {d} \sqrt {c+d x^2} \sqrt {e+f x^2} (b c-a d) (b e-a f)}-\frac {d \sqrt {e} \sqrt {f} \sqrt {c+d x^2} F\left (\text {ArcTan}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 c \sqrt {e+f x^2} (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}}}+\frac {b \sqrt {e} \sqrt {f} \sqrt {c+d x^2} E\left (\text {ArcTan}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 a \sqrt {e+f x^2} (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}}}+\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a \left (a+b x^2\right ) (b c-a d) (b e-a f)}-\frac {b f x \sqrt {c+d x^2}}{2 a \sqrt {e+f x^2} (b c-a d) (b e-a f)} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[1/((a + b*x^2)^2*Sqrt[c + d*x^2]*Sqrt[e + f*x^2]),x]

[Out]

-1/2*(b*f*x*Sqrt[c + d*x^2])/(a*(b*c - a*d)*(b*e - a*f)*Sqrt[e + f*x^2]) + (b^2*x*Sqrt[c + d*x^2]*Sqrt[e + f*x
^2])/(2*a*(b*c - a*d)*(b*e - a*f)*(a + b*x^2)) + (b*Sqrt[e]*Sqrt[f]*Sqrt[c + d*x^2]*EllipticE[ArcTan[(Sqrt[f]*
x)/Sqrt[e]], 1 - (d*e)/(c*f)])/(2*a*(b*c - a*d)*(b*e - a*f)*Sqrt[(e*(c + d*x^2))/(c*(e + f*x^2))]*Sqrt[e + f*x
^2]) - (d*Sqrt[e]*Sqrt[f]*Sqrt[c + d*x^2]*EllipticF[ArcTan[(Sqrt[f]*x)/Sqrt[e]], 1 - (d*e)/(c*f)])/(2*c*(b*c -
a*d)*(b*e - a*f)*Sqrt[(e*(c + d*x^2))/(c*(e + f*x^2))]*Sqrt[e + f*x^2]) + (Sqrt[-c]*(b^2*c*e + 3*a^2*d*f - 2*
a*b*(d*e + c*f))*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticPi[(b*c)/(a*d), ArcSin[(Sqrt[d]*x)/Sqrt[-c]],
(c*f)/(d*e)])/(2*a^2*Sqrt[d]*(b*c - a*d)*(b*e - a*f)*Sqrt[c + d*x^2]*Sqrt[e + f*x^2])

Rule 422

Int[Sqrt[(a_) + (b_.)*(x_)^2]/((c_) + (d_.)*(x_)^2)^(3/2), x_Symbol] :> Simp[(Sqrt[a + b*x^2]/(c*Rt[d/c, 2]*Sq
rt[c + d*x^2]*Sqrt[c*((a + b*x^2)/(a*(c + d*x^2)))]))*EllipticE[ArcTan[Rt[d/c, 2]*x], 1 - b*(c/(a*d))], x] /;
FreeQ[{a, b, c, d}, x] && PosQ[b/a] && PosQ[d/c]

Rule 429

Int[1/(Sqrt[(a_) + (b_.)*(x_)^2]*Sqrt[(c_) + (d_.)*(x_)^2]), x_Symbol] :> Simp[(Sqrt[a + b*x^2]/(a*Rt[d/c, 2]*
Sqrt[c + d*x^2]*Sqrt[c*((a + b*x^2)/(a*(c + d*x^2)))]))*EllipticF[ArcTan[Rt[d/c, 2]*x], 1 - b*(c/(a*d))], x] /
; FreeQ[{a, b, c, d}, x] && PosQ[d/c] && PosQ[b/a] &&  !SimplerSqrtQ[b/a, d/c]

Rule 506

Int[(x_)^2/(Sqrt[(a_) + (b_.)*(x_)^2]*Sqrt[(c_) + (d_.)*(x_)^2]), x_Symbol] :> Simp[x*(Sqrt[a + b*x^2]/(b*Sqrt
[c + d*x^2])), x] - Dist[c/b, Int[Sqrt[a + b*x^2]/(c + d*x^2)^(3/2), x], x] /; FreeQ[{a, b, c, d}, x] && NeQ[b
*c - a*d, 0] && PosQ[b/a] && PosQ[d/c] &&  !SimplerSqrtQ[b/a, d/c]

Rule 545

Int[((a_) + (b_.)*(x_)^(n_))^(p_.)*((c_) + (d_.)*(x_)^(n_))^(q_.)*((e_) + (f_.)*(x_)^(n_)), x_Symbol] :> Dist[
e, Int[(a + b*x^n)^p*(c + d*x^n)^q, x], x] + Dist[f, Int[x^n*(a + b*x^n)^p*(c + d*x^n)^q, x], x] /; FreeQ[{a,
b, c, d, e, f, n, p, q}, x]

Rule 551

Int[1/(((a_) + (b_.)*(x_)^2)*Sqrt[(c_) + (d_.)*(x_)^2]*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Simp[(1/(a*Sqr
t[c]*Sqrt[e]*Rt[-d/c, 2]))*EllipticPi[b*(c/(a*d)), ArcSin[Rt[-d/c, 2]*x], c*(f/(d*e))], x] /; FreeQ[{a, b, c,
d, e, f}, x] &&  !GtQ[d/c, 0] && GtQ[c, 0] && GtQ[e, 0] &&  !( !GtQ[f/e, 0] && SimplerSqrtQ[-f/e, -d/c])

Rule 552

Int[1/(((a_) + (b_.)*(x_)^2)*Sqrt[(c_) + (d_.)*(x_)^2]*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Dist[Sqrt[1 +
(d/c)*x^2]/Sqrt[c + d*x^2], Int[1/((a + b*x^2)*Sqrt[1 + (d/c)*x^2]*Sqrt[e + f*x^2]), x], x] /; FreeQ[{a, b, c,
d, e, f}, x] &&  !GtQ[c, 0]

Rule 563

Int[1/(((a_) + (b_.)*(x_)^2)^2*Sqrt[(c_) + (d_.)*(x_)^2]*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Simp[b^2*x*S
qrt[c + d*x^2]*(Sqrt[e + f*x^2]/(2*a*(b*c - a*d)*(b*e - a*f)*(a + b*x^2))), x] + (Dist[(b^2*c*e + 3*a^2*d*f -
2*a*b*(d*e + c*f))/(2*a*(b*c - a*d)*(b*e - a*f)), Int[1/((a + b*x^2)*Sqrt[c + d*x^2]*Sqrt[e + f*x^2]), x], x]
- Dist[d*(f/(2*a*(b*c - a*d)*(b*e - a*f))), Int[(a + b*x^2)/(Sqrt[c + d*x^2]*Sqrt[e + f*x^2]), x], x]) /; Free
Q[{a, b, c, d, e, f}, x]

Rubi steps

\begin {align*} \int \frac {1}{\left (a+b x^2\right )^2 \sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx &=\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a (b c-a d) (b e-a f) \left (a+b x^2\right )}-\frac {(d f) \int \frac {a+b x^2}{\sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx}{2 a (b c-a d) (b e-a f)}+\frac {\left (b^2 c e+3 a^2 d f-2 a b (d e+c f)\right ) \int \frac {1}{\left (a+b x^2\right ) \sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx}{2 a (b c-a d) (b e-a f)}\\ &=\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a (b c-a d) (b e-a f) \left (a+b x^2\right )}-\frac {(d f) \int \frac {1}{\sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx}{2 (b c-a d) (b e-a f)}-\frac {(b d f) \int \frac {x^2}{\sqrt {c+d x^2} \sqrt {e+f x^2}} \, dx}{2 a (b c-a d) (b e-a f)}+\frac {\left (\left (b^2 c e+3 a^2 d f-2 a b (d e+c f)\right ) \sqrt {1+\frac {d x^2}{c}}\right ) \int \frac {1}{\left (a+b x^2\right ) \sqrt {1+\frac {d x^2}{c}} \sqrt {e+f x^2}} \, dx}{2 a (b c-a d) (b e-a f) \sqrt {c+d x^2}}\\ &=-\frac {b f x \sqrt {c+d x^2}}{2 a (b c-a d) (b e-a f) \sqrt {e+f x^2}}+\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a (b c-a d) (b e-a f) \left (a+b x^2\right )}-\frac {d \sqrt {e} \sqrt {f} \sqrt {c+d x^2} F\left (\tan ^{-1}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 c (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}} \sqrt {e+f x^2}}+\frac {(b e f) \int \frac {\sqrt {c+d x^2}}{\left (e+f x^2\right )^{3/2}} \, dx}{2 a (b c-a d) (b e-a f)}+\frac {\left (\left (b^2 c e+3 a^2 d f-2 a b (d e+c f)\right ) \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}}\right ) \int \frac {1}{\left (a+b x^2\right ) \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}}} \, dx}{2 a (b c-a d) (b e-a f) \sqrt {c+d x^2} \sqrt {e+f x^2}}\\ &=-\frac {b f x \sqrt {c+d x^2}}{2 a (b c-a d) (b e-a f) \sqrt {e+f x^2}}+\frac {b^2 x \sqrt {c+d x^2} \sqrt {e+f x^2}}{2 a (b c-a d) (b e-a f) \left (a+b x^2\right )}+\frac {b \sqrt {e} \sqrt {f} \sqrt {c+d x^2} E\left (\tan ^{-1}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 a (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}} \sqrt {e+f x^2}}-\frac {d \sqrt {e} \sqrt {f} \sqrt {c+d x^2} F\left (\tan ^{-1}\left (\frac {\sqrt {f} x}{\sqrt {e}}\right )|1-\frac {d e}{c f}\right )}{2 c (b c-a d) (b e-a f) \sqrt {\frac {e \left (c+d x^2\right )}{c \left (e+f x^2\right )}} \sqrt {e+f x^2}}+\frac {\sqrt {-c} \left (b^2 c e+3 a^2 d f-2 a b (d e+c f)\right ) \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};\sin ^{-1}\left (\frac {\sqrt {d} x}{\sqrt {-c}}\right )|\frac {c f}{d e}\right )}{2 a^2 \sqrt {d} (b c-a d) (b e-a f) \sqrt {c+d x^2} \sqrt {e+f x^2}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C] Result contains complex when optimal does not.
time = 4.47, size = 587, normalized size = 1.21 \begin {gather*} \frac {\frac {b^2 c e x}{a+b x^2}+\frac {b^2 d e x^3}{a+b x^2}+\frac {b^2 c f x^3}{a+b x^2}+\frac {b^2 d f x^5}{a+b x^2}+i b c \sqrt {\frac {d}{c}} e \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} E\left (i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )-i c \sqrt {\frac {d}{c}} (b e-a f) \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} F\left (i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )-\frac {i b^2 c e \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )}{a \sqrt {\frac {d}{c}}}+2 i b c \sqrt {\frac {d}{c}} e \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )+\frac {2 i b c f \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )}{\sqrt {\frac {d}{c}}}-3 i a c \sqrt {\frac {d}{c}} f \sqrt {1+\frac {d x^2}{c}} \sqrt {1+\frac {f x^2}{e}} \Pi \left (\frac {b c}{a d};i \sinh ^{-1}\left (\sqrt {\frac {d}{c}} x\right )|\frac {c f}{d e}\right )}{2 a (-b c+a d) (-b e+a f) \sqrt {c+d x^2} \sqrt {e+f x^2}} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[1/((a + b*x^2)^2*Sqrt[c + d*x^2]*Sqrt[e + f*x^2]),x]

[Out]

((b^2*c*e*x)/(a + b*x^2) + (b^2*d*e*x^3)/(a + b*x^2) + (b^2*c*f*x^3)/(a + b*x^2) + (b^2*d*f*x^5)/(a + b*x^2) +
I*b*c*Sqrt[d/c]*e*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticE[I*ArcSinh[Sqrt[d/c]*x], (c*f)/(d*e)] - I*
c*Sqrt[d/c]*(b*e - a*f)*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticF[I*ArcSinh[Sqrt[d/c]*x], (c*f)/(d*e)]
- (I*b^2*c*e*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticPi[(b*c)/(a*d), I*ArcSinh[Sqrt[d/c]*x], (c*f)/(d
*e)])/(a*Sqrt[d/c]) + (2*I)*b*c*Sqrt[d/c]*e*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticPi[(b*c)/(a*d), I*
ArcSinh[Sqrt[d/c]*x], (c*f)/(d*e)] + ((2*I)*b*c*f*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^2)/e]*EllipticPi[(b*c)/(a*
d), I*ArcSinh[Sqrt[d/c]*x], (c*f)/(d*e)])/Sqrt[d/c] - (3*I)*a*c*Sqrt[d/c]*f*Sqrt[1 + (d*x^2)/c]*Sqrt[1 + (f*x^
2)/e]*EllipticPi[(b*c)/(a*d), I*ArcSinh[Sqrt[d/c]*x], (c*f)/(d*e)])/(2*a*(-(b*c) + a*d)*(-(b*e) + a*f)*Sqrt[c
+ d*x^2]*Sqrt[e + f*x^2])

________________________________________________________________________________________

Maple [B] Leaf count of result is larger than twice the leaf count of optimal. \(1077\) vs. \(2(502)=1004\).
time = 0.15, size = 1078, normalized size = 2.22 Too large to display

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(b*x^2+a)^2/(d*x^2+c)^(1/2)/(f*x^2+e)^(1/2),x,method=_RETURNVERBOSE)

[Out]

-1/2*(-(-d/c)^(1/2)*a*b^2*d*f*x^5+((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticF(x*(-d/c)^(1/2),(c*f/d/e)^(
1/2))*a^2*b*d*f*x^2-((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticF(x*(-d/c)^(1/2),(c*f/d/e)^(1/2))*a*b^2*d*
e*x^2+((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticE(x*(-d/c)^(1/2),(c*f/d/e)^(1/2))*a*b^2*d*e*x^2-3*((d*x^
2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)^(1/2))*a^2*b*d*f*x^2+2
*((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)^(1/2))*a*b^2*c*
f*x^2+2*((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)^(1/2))*a
*b^2*d*e*x^2-((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)^(1/
2))*b^3*c*e*x^2-(-d/c)^(1/2)*a*b^2*c*f*x^3-(-d/c)^(1/2)*a*b^2*d*e*x^3+((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*
EllipticF(x*(-d/c)^(1/2),(c*f/d/e)^(1/2))*a^3*d*f-((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticF(x*(-d/c)^(
1/2),(c*f/d/e)^(1/2))*a^2*b*d*e+((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticE(x*(-d/c)^(1/2),(c*f/d/e)^(1/
2))*a^2*b*d*e-3*((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)^
(1/2))*a^3*d*f+2*((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d/c)
^(1/2))*a^2*b*c*f+2*((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-d
/c)^(1/2))*a^2*b*d*e-((d*x^2+c)/c)^(1/2)*((f*x^2+e)/e)^(1/2)*EllipticPi(x*(-d/c)^(1/2),b*c/a/d,(-f/e)^(1/2)/(-
d/c)^(1/2))*a*b^2*c*e-(-d/c)^(1/2)*a*b^2*c*e*x)*(f*x^2+e)^(1/2)*(d*x^2+c)^(1/2)/(-d/c)^(1/2)/(b*x^2+a)/a^2/(a*
d-b*c)/(a*f-b*e)/(d*f*x^4+c*f*x^2+d*e*x^2+c*e)

________________________________________________________________________________________

Maxima [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(b*x^2+a)^2/(d*x^2+c)^(1/2)/(f*x^2+e)^(1/2),x, algorithm="maxima")

[Out]

integrate(1/((b*x^2 + a)^2*sqrt(d*x^2 + c)*sqrt(f*x^2 + e)), x)

________________________________________________________________________________________

Fricas [F(-1)] Timed out
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Timed out} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(b*x^2+a)^2/(d*x^2+c)^(1/2)/(f*x^2+e)^(1/2),x, algorithm="fricas")

[Out]

Timed out

________________________________________________________________________________________

Sympy [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {1}{\left (a + b x^{2}\right )^{2} \sqrt {c + d x^{2}} \sqrt {e + f x^{2}}}\, dx \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(b*x**2+a)**2/(d*x**2+c)**(1/2)/(f*x**2+e)**(1/2),x)

[Out]

Integral(1/((a + b*x**2)**2*sqrt(c + d*x**2)*sqrt(e + f*x**2)), x)

________________________________________________________________________________________

Giac [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(b*x^2+a)^2/(d*x^2+c)^(1/2)/(f*x^2+e)^(1/2),x, algorithm="giac")

[Out]

integrate(1/((b*x^2 + a)^2*sqrt(d*x^2 + c)*sqrt(f*x^2 + e)), x)

________________________________________________________________________________________

Mupad [F]
time = 0.00, size = -1, normalized size = -0.00 \begin {gather*} \int \frac {1}{{\left (b\,x^2+a\right )}^2\,\sqrt {d\,x^2+c}\,\sqrt {f\,x^2+e}} \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/((a + b*x^2)^2*(c + d*x^2)^(1/2)*(e + f*x^2)^(1/2)),x)

[Out]

int(1/((a + b*x^2)^2*(c + d*x^2)^(1/2)*(e + f*x^2)^(1/2)), x)

________________________________________________________________________________________